home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 December / PCWorld_2007-12_cd.bin / domacnost a kancelar / autoit / autoit-v3-setup.exe / Examples / Helpfile / TrayItemDelete.au3 < prev    next >
Text File  |  2007-09-08  |  569b  |  29 lines

  1. #Include <Constants.au3>
  2. #NoTrayIcon
  3.  
  4. Opt("TrayMenuMode",1)    ; Default tray menu items (Script Paused/Exit) will not be shown.
  5.  
  6. $delitem        = TrayCreateItem("Delete")
  7. TrayCreateItem("")
  8. $aboutitem        = TrayCreateItem("About")
  9. TrayCreateItem("")
  10. $exititem        = TrayCreateItem("Exit")
  11.  
  12. TraySetState()
  13.  
  14. While 1
  15.     $msg = TrayGetMsg()
  16.     Select
  17.         Case $msg = 0
  18.             ContinueLoop
  19.         Case $msg = $aboutitem
  20.             Msgbox(64,"About:","AutoIt3-Tray-sample")
  21.         Case $msg = $delitem
  22.             TrayItemDelete($delitem)
  23.         Case $msg = $exititem
  24.             ExitLoop
  25.     EndSelect
  26. WEnd
  27.  
  28. Exit
  29.